﻿


'终端历史数据记录
Public Class HDataTypeItem

    Private _ParentID As Integer '该条数据所属启停纪录的ID
    Public Property ParentID() As Integer
        Get
            Return _ParentID
        End Get
        Set(ByVal value As Integer)
            _ParentID = value
        End Set
    End Property

    Private _NetID As Integer '网络标识
    Public Property NetID() As Integer
        Get
            Return _NetID
        End Get
        Set(ByVal value As Integer)
            _NetID = value
        End Set
    End Property

    Private _RecordTime As DateTime '记录时间
    Public Property RecordTime() As DateTime
        Get
            Return _RecordTime
        End Get
        Set(ByVal value As DateTime)
            _RecordTime = value
        End Set
    End Property

    Private _AI1 As Single 'T1
    Public Property AI1() As Single
        Get
            Return _AI1
        End Get
        Set(ByVal value As Single)
            _AI1 = value
        End Set
    End Property

    Private _FormatAI1 As String 'T1显示数据
    Public Property FormatAI1() As String
        Get
            Return _FormatAI1
        End Get
        Set(ByVal value As String)
            _FormatAI1 = value
        End Set
    End Property

    Private _AI2 As Single 'T2
    Public Property AI2() As Single
        Get
            Return _AI2
        End Get
        Set(ByVal value As Single)
            _AI2 = value
        End Set
    End Property

    Private _FormatAI2 As String 'T2显示数据
    Public Property FormatAI2() As String
        Get
            Return _FormatAI2
        End Get
        Set(ByVal value As String)
            _FormatAI2 = value
        End Set
    End Property

    Private _AI3 As Single 'T3
    Public Property AI3() As Single
        Get
            Return _AI3
        End Get
        Set(ByVal value As Single)
            _AI3 = value
        End Set
    End Property

    Private _FormatAI3 As String 'T3显示数据
    Public Property FormatAI3() As String
        Get
            Return _FormatAI3
        End Get
        Set(ByVal value As String)
            _FormatAI3 = value
        End Set
    End Property

    Private _AI4 As Single 'RH1
    Public Property AI4() As Single
        Get
            Return _AI4
        End Get
        Set(ByVal value As Single)
            _AI4 = value
        End Set
    End Property

    Private _FormatAI4 As String 'T4显示数据
    Public Property FormatAI4() As String
        Get
            Return _FormatAI4
        End Get
        Set(ByVal value As String)
            _FormatAI4 = value
        End Set
    End Property

    Private _Longitude_Dir As LONGITUDETYPE '经度方向(0表示东经;1表示西经)
    Public Property Longitude_Dir() As LONGITUDETYPE
        Get
            Return _Longitude_Dir
        End Get
        Set(ByVal value As LONGITUDETYPE)
            _Longitude_Dir = value
        End Set
    End Property

    Private _Longitude As Single '经度
    Public Property Longitude() As Single
        Get
            Return _Longitude
        End Get
        Set(ByVal value As Single)
            _Longitude = value
        End Set
    End Property

    Private _FormatLongitude As String '经度全部信息(包括经度方向)
    Public Property FormatLongitude() As String
        Get
            Return _FormatLongitude
        End Get
        Set(ByVal value As String)
            _FormatLongitude = value
        End Set
    End Property

    Private _Latitude_Dir As LATITUDETYPE  '纬度方向(0表示南纬;1表示北纬)
    Public Property Latitude_Dir() As LATITUDETYPE
        Get
            Return _Latitude_Dir
        End Get
        Set(ByVal value As LATITUDETYPE)
            _Latitude_Dir = value
        End Set
    End Property

    Private _Latitude As Single '纬度
    Public Property Latitude() As Single
        Get
            Return _Latitude
        End Get
        Set(ByVal value As Single)
            _Latitude = value
        End Set
    End Property

    Private _FormatLatitude As String '纬度全部信息(包括纬度方向)
    Public Property FormatLatitude() As String
        Get
            Return _FormatLatitude
        End Get
        Set(ByVal value As String)
            _FormatLatitude = value
        End Set
    End Property

    Private _SeqNo As Integer
    Public Property SeqNo() As Integer
        Get
            Return _SeqNo
        End Get
        Set(ByVal value As Integer)
            _SeqNo = value
        End Set
    End Property

End Class
